home *** CD-ROM | disk | FTP | other *** search
/ Airline Maintenance & Engineering / Unisys Airline Maintenance & Engineering.iso / solution.dxr / 00191.ls < prev    next >
Encoding:
Text File  |  1997-04-14  |  1.3 KB  |  61 lines

  1. on startMovie
  2.   set_visible(1, 44)
  3. end
  4.  
  5. on roll_check first, last, offset
  6.   repeat with temp = first to last
  7.     if rollOver(temp) then
  8.       set the visible of sprite (temp + offset) to 1
  9.       set the visible of sprite (temp + (offset * 2)) to 1
  10.       next repeat
  11.     end if
  12.     set the visible of sprite (temp + offset) to 0
  13.     set the visible of sprite (temp + (offset * 2)) to 0
  14.   end repeat
  15. end
  16.  
  17. on set_visible first, last
  18.   repeat with temp = first to last
  19.     set the visible of sprite temp to 1
  20.   end repeat
  21. end
  22.  
  23. on set_invisible first, last
  24.   repeat with temp = first to last
  25.     set the visible of sprite temp to 0
  26.   end repeat
  27. end
  28.  
  29. on transition
  30.   puppetSprite(40, 0)
  31.   puppetTransition(10)
  32. end
  33.  
  34. on transition_true
  35.   puppetSprite(40, 1)
  36.   puppetTransition(23)
  37. end
  38.  
  39. on compass_check
  40.   if (the mouseV < 480) and (the mouseV > 0) then
  41.     set the castNum of sprite 40 to cast ("comp" & the mouseV / 25 & EMPTY)
  42.   end if
  43. end
  44.  
  45. on timings_set value
  46.   global timings_list, timings_place
  47.   set timings_list to value
  48.   set timings_place to 1
  49.   startTimer()
  50. end
  51.  
  52. on timings_hold
  53.   global timings_list, timings_place
  54.   if (the timer / 60) > getAt(timings_list, timings_place) then
  55.     set timings_place to timings_place + 1
  56.     go(the frame + 1)
  57.   else
  58.     go(the frame)
  59.   end if
  60. end
  61.